function [X,Y] = test
%
% function test
%
% tests the hedger learning algorithm

rand('seed',1);

X = [];
Y = [];

reward = @(s,a) norm(a*s');
move = @(s,a) sum(s*a',2);

for i=1:100
	disp(sprintf('iteration %d',i))
	
    s = rand(25,1);
	a = rand(13,1);
    
	predict(X,Y,s,a); % why don't you use the return arguments of the predict function here?
    keyboard
    
	r = reward(s,a);
	sp = move(s,a);

	[X,Y] = update(X,Y,s,a,r,sp);
end
keyboard